Use set-input-mode to make Latin-1 chars work.

diff --git a/lisp/term/linux.el b/lisp/term/linux.el
index 85abbe176109624845e9f73d7db9ef318adde18b..5f279eb5568d3ac07abdbc140c5b2eed74475212 100644 (file)
--- a/lisp/term/linux.el
+++ b/lisp/term/linux.el
@@ -1,3 +1,11 @@
 ;; The Linux console handles Latin-1 by default.
 
 (set-terminal-coding-system 'iso-latin-1)
+
+;; Make Latin-1 input characters work, too.
+;; Meta will continue to work, because the kernel
+;; turns that into Escape.
+
+(let ((value (current-input-mode)))
+  ;; The third arg only matters in that it is not t or nil.
+  (set-input-mode (nth 0 value) (nth 1 value) 'iso-latin-1 (nth 3 value)))